Imports capaLogica

Public Class FormReporteGrupal
    Private url As String

    Public Sub New(ByVal idGrupo As Integer)

        ' This call is required by the Windows Form Designer.
        InitializeComponent()
        Dim gestor As New GestorGenerarReportes
        Me.url = gestor.GenerarReporteGrupal(idGrupo)
        WebBrowserReporteNotas.Navigate(url)

        ' Add any initialization after the InitializeComponent() call.

    End Sub
    Public Sub New(ByVal url As String)
        InitializeComponent()
        Me.url = url
        WebBrowserReporteNotas.Navigate(url)
    End Sub

    Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAceptar.Click
        Me.Close()
    End Sub
End Class